За сегодня

Топиков: 209

форум акций: 391

остальные форумы: 202

комментариев: 1852

за месяц

 

Блог им. NektoFinkelmaer |Скрипт для расчета планируемых дивидендов (VBScript)

Дивидендный сезон в разгаре, пора рассчитать планируемые дивиденды.
Держите скрипт для Excel.

1. Укажите тикер
2. Укажите количество
3. Вставьте формулу "=Dividend(Тикер)"
4. Перемножьте одно на другое
5. Ваш портфель великолепен.

Скрипт для расчета планируемых дивидендов (VBScript)


Function Dividend(Ticker) As Double

    Dim xmlHttp As Object
    Set xmlHttp = CreateObject("MSXML2.ServerXMLHTTP.6.0")

    myurl = "https://www.dohod.ru/ik/analytics/dividend/" + StrConv(Ticker, vbLowerCase)
    
    xmlHttp.Open "GET", myurl, False
    xmlHttp.Send
    
    Text = xmlHttp.responseText
    
    Pos = InStr(1, Text, "<p>Совокупные дивиденды в следующие 12m:", vbTextCompare)
    
    Text = Mid(Text, Pos)
    Pos = InStr(1, Text, "</span>", vbTextCompare)
    Text = Left(Text, Pos - 1)
    
    Pos = InStr(1, Text, """>", vbTextCompare)
    Text = Mid(Text, Pos + 2)
    Text = Replace(Text, " ", "")
    
    Dividend = Val(Text)
    
End Function
PS: Все права на расчет дивидендов принадлежат www.dohod.ru/

Блог им. NektoFinkelmaer |График влево

Гуру рынка говорят — график цены акции может идти иногда вверх, иногда вниз и всегда вправо.
Как же они ошибались!
Держи график влево, да еще и не один, добавь сколько хочешь инструментов с фондовой секции ММВБ.
Скрипт стягивает данные с iss.moex.com/ рисует график и зиг-заг. (интервал час)

График влево

Пользуйся — и твой трейдинг выйдет на новый уровень.

<!DOCTYPE html>
<html>
<head>
    <meta charset="utf-8" />
</head>
<body>

<form name="search">
    <input type="text" name="key" placeholder="Тикер" id="key"/>
    <input type="button" name="buttonChart" value="График" />
</form>
<div id="printBlock"></div>
<canvas id="chart" width="4000" height="300"></canvas>
<script>
const keyBox = document.search.key;
const keyButton = document.search.buttonChart;
 
 function DrawChart(prices,minPrice,maxPrice,maxVolume,ZZ){

	var chart = document.getElementById("chart");
	
	
	if (chart.getContext) {
		var ctx = chart.


( Читать дальше )

полезные записи за 24 часа

★19 58 😈Злые капиталисты накручивают цены!
★9 2 Топ-10 валютных облигаций с наибольшей доходностью от РБК Инвестиций
★9 8 Мой первый и неудачный опыт поиска торговой стратегии для Московской биржи
★7 28 Составил подписчику дивидендный портфель стоимостью 1.5 млн рублей
★3 38 Как я потерял более 70 млн. рублей на бирже 🎪
★3 22 Рынок акций резко отскочил! Продолжится ли падение?
★3 10 2 месяца инвестиций
★3 25 Пугалки "заморозкой" вкладов и крахом LQDT.
★3 53 Как банкомат стырил 300 тысяч, и что было дальше
★3 2 Мой портфель акций на 17 ноября 2024
+196 119 Ситуация на текущий момент
+185 58 😈Злые капиталисты накручивают цены!
+171 30 Что делал в выходные?
+137 63 Риск использования брокера Тинькофф, часть 2
+106 194 Очень тревожные новости.....
+103 25 Пугалки "заморозкой" вкладов и крахом LQDT.
+95 16 Интepecы poccиян в интepнeтe
+93 39 УФСБ задержало очередных Лжеброкеров...
+91 72 Азия. Понедельник.
+76 45 По 100й паровоз, не стучите колёса

самые обсуждаемые сегодня

119к Ситуация на текущий момент
72к Азия. Понедельник.
58к 😈Злые капиталисты накручивают цены!
41к Метод Геллы. Бегом. (Gella)
37к Новый нежданчик от правительства: налог для Транснефти -40% вместо -25%
31к А в случае использования ТЯО , крипта как себя поведёт?
29к Вы верите этому заявлению?
28к Составил подписчику дивидендный портфель стоимостью 1.5 млн рублей
28к Caмaя дeшeвaя квapтиpa в Mocквe
26к Почему вы не можете заработать на рынке
....все тэги
UPDONW
Новый дизайн